<?
session_start();
$ruta_raiz = "..";
if (!$dependencia and !$depe_codi_territorial)include "../rec_session.php";

$htmlE ="";

error_reporting(7);
?>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="../estilos/orfeo.css">
</head>
<body>
<?
if($gen_lisDefi and !$cancelarListado)
{
	$indi_generar = "SI";
}
else
{
	$indi_generar = "NO";
}

if($indi_generar=="SI")
{

	?>
<table class=borde_tab width='100%' cellspacing="5">
	<tr>
		<td class=titulos2>
		<center>LISTADO DOCUMENTOS IMPRESOS</center>
		</td>
	</tr>
</table>
<table>
	<tr>
		<td></td>
	</tr>
</table>
<?php
	$uri = session_name()."=".session_id()."&krd=$krd&hora_ini=$hora_ini&hora_fin=$hora_fin&minutos_ini=$minutos_ini&minutos_fin=$minutos_fin&tip_radi=$tip_radi&fecha_busq=$fecha_busq&fecha_busqH=$fecha_busqH&fecha_h=$fechah&dep_sel=$dep_sel&num=$num";
?>
<form name='forma'
	action='generaListaImpresos.php?<?= $uri?>'
	method=post><?
	$fecha_ini = $fecha_busq . ":" .$hora_ini. ":" .$minutos_ini ;
	$fecha_fin = $fecha_busqH . ":" .$hora_fin. ":" .$minutos_fin ;
	if ($checkValue)
	{
		$num = count($checkValue);
		$i = 0;
		while ($i < $num)
		{
			$record_id = key($checkValue);
			$radicadosSel[$i] = $record_id;
			$setFiltroSelect .= $record_id ;
			if($i<=($num-2))
			{
				$setFiltroSelect .= ",";
			}
			next($checkValue);
			$i++;
		}
		if ($radicadosSel) 	$whereFiltro = " and b.radi_nume_radi in($setFiltroSelect)";
	} // FIN  if ($checkValue)

	if ($setFiltroSelect) $filtroSelect = $setFiltroSelect;
	if ($filtroSelect)
	{

		// En este proceso se utilizan las variabels $item, $textElements, $newText que son temporales para esta operacion.

		$filtroSelect = trim($filtroSelect);
		$textElements = split (",", $filtroSelect);
		$newText = "";
		foreach ($textElements as $item) {
			$item = trim ( $item );
			if ( strlen ( $item ) != 0) {
				if (strlen($item)<=6)  $sec = str_pad($item,6,"0",STR_PAD_left);
			}
		}
	} // FIN if ($filtroSelect)

	$carp_codi = substr($dep_radicado,0,2);

	error_reporting(7);

	include_once "$ruta_raiz/include/db/ConnectionHandler.php";
	$db = new ConnectionHandler("$ruta_raiz");
	define('ADODB_FETCH_ASSOC',2);
	$ADODB_FETCH_MODE = ADODB_FETCH_ASSOC;

	include "$ruta_raiz/include/query/envios/queryListaImpresos.php";
	$rsMarcar = $db->query($isql);
	$no_registros = 0;
	//$no_registros = $rsMarcar->recordcount();
	$radiNumero = $rsMarcar->fields["RADI_NUME_RADI"];
	//if ($no_registros <=0) {
	if ($radiNumero =='') {
		$estado = "Error";
		$mensaje = "Verifique...";
		foreach ($textElements as $item) {
			$verrad_sal = trim ( $item );
		}
		echo "<script>alert('No se puede Generar el Listado $verrad_sal . $mensaje  ')</script>";
	}
	else
	{
		//Modificacion 28112005
		$archivo = "../bodega/pdfs/planillas/envios/$krd". date("Ymd_hms") . "_lis_IMP.csv";
		$arpdf_tmp = "../bodega/pdfs/planillas/envios/$krd". date("Ymd_hms") . "_lis_IMP.pdf";

		$fp=fopen($archivo,"w");
		$com = chr(34);
		$contenido="$com*Radicado*$com,$com*Radicado Padre*$com,$com*Titulo*$com,$com*Destinatario*$com,$com*Direccion*$com,$com*Telefono*$com,$com*Municipio*$com,$com*Departamento*$com,$com*Observacion*$com\n";
		$query_t = $isql ;

		$ruta_raiz = "..";	
		
		error_reporting(7);
		define('ADODB_FETCH_NUM',1);
		$ADODB_FETCH_MODE = ADODB_FETCH_NUM;
		require "../envios/classControlLis.php";
		echo $cont;
		$btt = new CONTROL_ORFEO($db);		
		$campos_align = array("C","C","L","L","L","L","L");
		
		$campos_tabla = array("$verrad_sal","$verrad","$nombre_us","$direccion_us","$destino","$departamento","$observa");
		$campos_vista = array ("Radicado","Radicado Padre","Destinatario","Direccion","Ciudad","Observacion");
		$campos_width = array (100       ,100             ,250           ,320        ,80     ,250          );
		$btt->campos_align = $campos_align;
		$btt->campos_tabla = $campos_tabla;
		$btt->campos_vista = $campos_vista;
		$btt->campos_width = $campos_width;
		$btt->tabla_sql($query_t,$fecha_ini,$fecha_fin);		
		$htmlE = $btt->tabla_htmlE;
		?>
		<div class='titulos2' style"padding:1px">
		<center>
		<br><br>
		<!--a href="paramGenerarSobres.php?<?=$uri?>" target="_blank"
			onclick="window.open(this.href, this.target, 'location=no,toolbar=no,menubar=no,scrollbars=no,resizable=no,status=no,width=350,height=220,left=300,top=250'); return false;"
			class="botones_largo" style="padding: 3px 3px 1px 3px; text-decoration: none;">Generar Sobres</a--> &nbsp;
		<a class="botones_largo" style="padding: 3px 3px 1px 3px; text-decoration: none;"
			href="<?php echo $arpdf_tmp ?>" target="<?php echo date("dmYh").time("his") ?>">Descargar PDF</a>&nbsp;
		<a class="botones_largo" style="padding: 3px 3px 1px 3px; text-decoration: none;"
			href="<?php echo $archivo ?>" target="<?php echo date("dmYh").time("his") ?>">Descargar CSV</a>
		<br><br>
		</div>
		</center>
		<?php
		//Fin Modificacion 28112005
		while (!$rsMarcar->EOF) {
			$no_registros = $no_registros + 1;
			$mensaje = "";
			$verrad_sal     = $rsMarcar->fields["RADI_NUME_SALIDA"];
			$verradicado    = $rsMarcar->fields["RADI_NUME_RADI"];
			$ref_pdf        = $rsMarcar->fields["ANEX_NOMB_ARCHIVO"];
			$asunto         = $rsMarcar->fields["ANEX_DESC"];
			$sgd_dir_tipo   = $rsMarcar->fields["SGD_DIR_TIPO"];
			$rem_destino    = $rsMarcar->fields["SGD_DIR_TIPO"];
			$anex_radi_nume = $rsMarcar->fields["ANEX_RADI_NUME"];
			$radi_desc_anex =$rsMarcar->fields["RADI_DESC_ANEX"];
			$dep_radicado   = substr($verrad_sal,4,3);
			$ano_radicado   = substr($verrad_sal,0,4);
			$carp_codi      = substr($dep_radicado,0,2);
			$radi_path_sal = "/$ano_radicado/$dep_radicado/docs/$ref_pdf";

			if(substr($rem_destino,0,1)=="7") $anex_radi_nume = $verrad_sal;
			$nurad = $anex_radi_nume;
			$verrad = $anex_radi_nume;
			$verradicado = $anex_radi_nume;

			$ruta_raiz= "..";
			include "../ver_datosrad.php";

			if ($radicadopadre) $radicado = $radicadopadre;
			if ($nurad) 	      $radicado = $nurad;

			$pCodDep = $dpto;
			$pCodMun = $muni;

			$nombre_us    = $otro . "-".substr($nombre . " " . $papel . " " . $sapel,0 ,29);

			if(!$rem_destino) $rem_destino =1;
			$sgd_dir_tipo = 1;
			echo "<input type='hidden' name='$espcodi' value='$espcodi'>";

			$ruta_raiz = "..";
			include "../jh_class/funciones_sgd.php";
			/*
		  *Se incluyen ya que en ver_datosrad no esta contemplada esta opcion
		  *que corresponde a copias
		  */
			$a = new LOCALIZACION($codep_us7,$muni_us7,$db);
			$dpto_nombre_us7 = $a->departamento;
			$muni_nombre_us7 = $a->municipio;
			/*
		  * Fin modificacion
		  */
			$a = new LOCALIZACION($pCodDep,$pCodMun,$db);
			$dpto_nombre_us = $a->departamento;
			$muni_nombre_us = $a->municipio;
			$direccion_us = $dir;
			$destino      = $muni_nombre_us;
			$departamento = $dpto_nombre_us;
			$dir_codigo   = $documento;
			/*
		  * Modificado 27072005
		  * Se modifica para que asuma el destinatario
		  */

			if($rem_destino==1)
			{
				$email_us = $email_us1;
				$telefono_us = $telefono_us1;
				$nombre_us = trim($nombre_us1);
				if($otro_us1) $nombre_us = $otro_us1 . " - " . $nombre_us;
				if($tipo_emp_us1==0)  $nombre_us .= " " . trim($prim_apel_us1) . " " . trim($seg_apel_us1);
				$destino = $muni_nombre_us1;
				$departamento = $dpto_nombre_us1;
				$direccion_us = $direccion_us1;
				$dir_codigo = $dir_codigo_us1;
				$dir_tipo = 1;
			}
			if($rem_destino==2)
			{
				$email_us = $email_us2;
				$telefono_us = $telefono_us2;
				$nombre_us = trim($nombre_us2);
				if($otro_us2) $nombre_us = $otro_us2 . " - " . $nombre_us;
				if($tipo_emp_us2==0)  $nombre_us .= " " . trim($prim_apel_us2) . " ". trim($seg_apel_us2);
				$destino = $muni_nombre_us2;
				$departamento = $dpto_nombre_us2;
				$direccion_us = $direccion_us2;
				$dir_codigo = $dir_codigo_us2;
				$dir_tipo = 2;
			}
			if($rem_destino==3)
			{
				$email_us = $email_us3;
				$telefono_us = $telefono_us3;
				$destino = $muni_nombre_us3;
				$departamento = $dpto_nombre_us3;
				$nombre_us = trim($nombre_us3);
				if($tipo_emp_us3==0)  $nombre_us .= " " . trim($prim_apel_us3) . " ".trim($seg_apel_us3);
				$dir_codigo = $dir_codigo_us3;
				$direccion_us = $direccion_us3;
				$dir_tipo = 3;
			}
			if(substr($rem_destino,0,1)==7)
			{
				$email_us = $email_us7;
				$telefono_us = $telefono_us7;
				$destino = $muni_nombre_us7;
				$departamento = $dpto_nombre_us7;
				$nombre_us = trim($nombre_us7);
				if($otro_us7) $nombre_us = $otro_us7 . " - " . $nombre_us;
				if($tipo_emp_us7==0)  $nombre_us .= " " . trim($prim_apel_us7) . " ".trim($seg_apel_us7);
				$dir_codigo = $dir_codigo_us7;
				$direccion_us = $direccion_us7;
				$dir_tipo = $rem_destino;
			}
			$nombre_us = substr(trim($nombre_us),0 ,29);
			/*
			 * Fin modificacion
			 */
			if (!$mensaje) {
				$mensaje = ""; $error = "no";
				if(!$nombre_us)    {$mensaje = "Nombre,";  $error = "si"; }
				if(!$direccion_us) {$mensaje .= "Direccion,"; $error = "si"; }
				if(!$destino)      {$mensaje .= "Municipio,";  $error = "si"; }
				if(!$departamento) {$mensaje .= "Departamento,";  $error = "si"; }
			}

			if ($error=="no") {
			}else{
				$estado = "Error " ;
			 $mensaje= "Faltan Datos $mensaje";
			 echo "<script>alert('Se debe revisar el siguiente Radicado $verrad_sal . $mensaje  ')</script>";
			}
			//Modificacion 28112005
//			$observa= "_";
			$observa= $radi_desc_anex;
			$campos_tabla = array("$verrad_sal","$verrad","$nombre_us","$direccion_us","$destino-$departamento","$observa:");
			$btt->campos_tabla = $campos_tabla;
			$btt->tabla_Cuerpo();
			error_reporting(7);
			$contenido= $contenido ."$com$verrad_sal$com,$com$verrad$com,$com $com,$com$nombre_us$com,$com$direccion_us$com,$com$telefono_us$com,$com$destino$com,$com$departamento$com,$com$observa$com\n";
			//Fin Modificacion 28112005
			$rsMarcar->MoveNext();

		} // FIN del WHILE (!$rsMarcar->EOF)
		fputs($fp,$contenido);
		fclose($fp);
		$fecha_dia = date("Y-m-d H:i:s");
		$html  = $htmlE;
		$html  .= $btt->tabla_html;
		//$html  = $btt->tabla_html;
		error_reporting(7);
		define(FPDF_FONTPATH,'../fpdf/font/');
		require("../fpdf/html_table.php");
		error_reporting(7);
		$pdf = new PDF("L","mm","A4");
		$pdf->AddPage();
		$pdf->SetFont('Arial','',8);
		$entidad = $db->entidad;
		$encaenti = "../png/encabezado_".$entidad . ".jpg";
		$encabezado = "<table border=0>
            <tr><td width=1120 height=70 colspan=2><img src=$encaenti width=750 height=65></td></tr>
			<tr><td width=1120 height=40 colspan=2> </td></tr>
			<tr><td width=1120 height=40 colspan=2> </td></tr>
			<tr><td width=1120 height=40 colspan=2> </td></tr>
			<tr><td width=1120 height=80 colspan=2> </td></tr>
			<tr><td width=140 height=20>Dependencia</td><td height=20>: $depe_nomb </td></tr>
			<tr><td width=140 height=20>Usuario responsable</td><td height=20>: $usua_nomb </td></tr>
			<tr><td width=140 height=20>Fecha Inicial</td><td height=20>: $fecha_ini </td></tr>
			<tr><td width=140 height=20>Fecha Final</td><td height=20>: $fecha_fin </td></tr>
			<tr><td width=140 height=20>Fecha Generado</td><td height=20>: $fecha_dia </td></tr>
			<tr><td width=140 height=20>Numero de Registros</td><td height=20>: $no_registros </td></tr>
			<tr><td width=1120 height=40 colspan=2></td></tr>
			</table>";
		$fin = "<!--table border=0 >
		    <tr><td width=1120 height=40></td></tr>
			<tr><td width=1120 height=40 >Fecha de Entrega         ________________________________________________</td></tr>
			<tr><td width=560 height=40 >Funcionario que Entrega  ________________________________________________</td>
			<td width=560 height=30 >Funcionario que Recibe   ______________________________________________</td></tr>
			<tr><td width=1120 height=40 >Observaciones	  ________________________________________________________________________________________________________________________________________________________________</td></tr>
			<tr><td width=1120 height=40 >_____________________________________________________________________________________________________________________________________________________________________________</td></tr>
			<tr><td width=1120 height=40></td></tr>
		</table-->
		<br>";	

		$pdf->WriteHTML($encabezado. $html. $fin);		
		$pdf->Output($arpdf_tmp);		
	
	}
	//FIN else if ($no_registros <=0)
	?>
	</form>
	<?php
}
else
{
	echo "<hr><center><b><span class='alarmas'>Operacion CANCELADA</span></center></b></hr>";
}
?>
<!--a href="paramGenerarSobres.php?<?=$uri?>" target="_blank"
			onclick="window.open(this.href, this.target, 'location=no,toolbar=no,menubar=no,scrollbars=no,resizable=no,status=no,width=350,height=220,left=300,top=250'); return false;"
			class="botones_funcion" style="padding: 3px 3px 1px 3px; text-decoration: none;">Generar Sobres</a> &nbsp;
<br> <a class="titulosComent"> Para generar sobres con el listado CSV </a>
<br-->
</body>
</html>

